home *** CD-ROM | disk | FTP | other *** search
/ SPACE 1 / SPACE - Library 1 - Volume 1.iso / program / 356 / defs / program.def < prev    next >
Text File  |  1992-03-11  |  2KB  |  61 lines
  1. DEFINITION MODULE Program;
  2. (*    (C) 1984, 1985 Djavaheri Bros., an upublished work.             *)
  3. (*    File name: Program.def                             *)
  4. (*    Creation : Auguest 1985                             *)
  5. (*    Function : Create and terminate a proccess                 *)
  6. (*    By     : Morris Djavaheri                         *)
  7. (*                                         *)
  8. (*
  9. *    Copyright (c) 1985, 1986 by
  10. *    Djavaheri Bros., Foster City, California.
  11. *    All Rights Reserved.
  12. *
  13. *    This software is furnished under a license and may be used and copied
  14. *    only  in accordance with  the  terms  of  such  license and  with the
  15. *    inclusion of the above copyright notice.  This software or  any other
  16. *    copies thereof may not be provided or otherwise made available to any
  17. *    other  person.   No title to and ownership of the  software is  herby
  18. *    transferred.
  19. *
  20. *    The information in this software is  subject to change without notice
  21. *    and  should  not be construed as a commitment by Djavaheri Bros.   No
  22. *    warranty is implied or expressed.
  23. *
  24. *   SCCID  = "1.3    10/8/86"; 
  25. *)
  26. (*    Modifcation History                              *)
  27. (*    Date        Who        Why                     *)
  28. (*                                         *)
  29. FROM SYSTEM IMPORT ADDRESS;
  30. EXPORT QUALIFIED 
  31.    CallResult, ARGC,ARGSTRING,
  32.    Call ,Terminate, Spawnl;
  33.  
  34. TYPE 
  35.    CallResult = ( normalReturn,        (* program terminate normally *)
  36.           programHalt,        (* halt executed          *)
  37.           keyboardHalt,        (* Termintate by user break (^C*)
  38.           missingProgram,    (* Subprogram not found       *)
  39.           missingModule,    (* Library module not found   *)
  40.           duplicateModule,    (* Duplicate Librayr module names *)
  41.           versionError,        (* Moduler version error     *)
  42.           codeError,        (* Code I/O Erorr or bad structer *)
  43.           programCheck,        (* Range, arith,storage,string,..*)
  44.           ioError,        (* User I/O error *)
  45.           noProcess,        (* No more process is allowed *)
  46.           noMemory,        (* Not enought memory of the process *)
  47.           unkownError        (* unkown error *) );
  48.  
  49.   PROCEDURE ARGSTRING (ac :CARDINAL): ADDRESS;
  50.  
  51.   PROCEDURE Call ( VAR programName : ARRAY OF CHAR;
  52.            VAR callResult  : CallResult);
  53.   
  54.   PROCEDURE Terminate (reason : CallResult);
  55.  
  56.   PROCEDURE Spawnl(VAR progname,arg0,arg1,arg2,arg3,arg4,arg5,arg6: 
  57.                          ARRAY OF CHAR): CallResult;
  58.   VAR
  59.    ARGC : CARDINAL;
  60. END Program.
  61.